BACKGROUND PROGRAMMING 


F’S 


Wilf Hey 
debunks a few 
myths and 
turns his 

PC screen 
technicolour 
to celebrate 


‘ springtime. 

he mysteries of how certain interrupts, programs, 
ae algorithms and techniques work can become the 

stuff of legends. What we need is a good debunk- 
ing of our myths occasionally — a spring cleanout — so 
that we don’t fall into the trap of idolising something that 
is simply the creation of other people. There is nothing 
magical about spreadsheets; there is nothing mystical 
about Dynamic Link Libraries. If we act as if there is, then 
progress beyond these good but primitive models will be 
slow indeed. 


SECURITY BLUES 

Garry Goodwin (Brentwood, Essex) wrote to me with fur- 
ther thoughts about security in software you write. He 
comments that if you install a password check, what do 
you do when the user fails to give the right password? He 
suggests a simple command (in Basic) that will just bring 
to a halt the programmable peripheral interface (PPI) — 
but his example certainly doesn’t work on my machine. I 
tend to use my own method: if they get it wrong the third 
time, reboot the system! Soon they are likely to get the 
idea that this software is off-limits to unauthorised per- 
sonnel. If you are in assembler, or in a language that can 
utilise assembly opcodes, you can cause a warm reboot 
by executing the following sequence: 


XOR DX,DX 

MOV ES, DX 

MOV DI,0472h 

MOV WORD PTR [ES:DI],1234h 
UMP OFFFFh:0000h 


If you wish to make it a cold reboot instead, just change 
the 1234h to 7F7Fh. If you are using Basic, you can still 
incorporate this little trick into your programs. Set aside a 
DIM variable with enough elements to give space for this 
tiny routine: it is 17 bytes long, so an integer DIM with 
ten elements will be enough. You then use VARPTR to get 
the memory address of the DIM variable, and with POKE, 
move the 17 bytes of the routine into it. Immediately you 
have done this, you can CALL the code and cause the 
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reboot to happen. In this little routine, note that you need 
lines 10000 and 10010, which establish the variables 
BYTE% and I%, used later; the mechanism Basic uses (at 
least GWBasic) will mess things up if it has to invent 
those variables when they are first u+ed a little further on. 
I have included a RESTORE command and a DEF SEG — 
both of which are optional, unless you have been doing 
something that has affected normal status. 


10000 BYTE%=0 

10010 1% = 0 

10020 RESTORE 10130 

10030 DEF SEG 

10040 DIM CODE%(10) 

10050 REBOOT = VARPTR(CODE%(1) ) 
10060 PLACE = REBOOT 

10070 FOR I% = 1 TO 17 

10080 READ BYTE% 

10090 POKE PLACE, BYTE% 

10100 PLACE = PLACE + 1 

10110 NEXT 

10120 CALL REBOOT 

10130 DATA &h31,&hD2,&h8E, &hC2, &hBF 
10140 DATA &h72,&h04,&h26,&hC7,&h05 
10150 DATA &h34,&h12,&hEA, &h00,&h00 
10160 DATA &hFF, &hFF 

10170 END 


CATCHING SLIPPERY KEYS 

Garry points out that there may be times — for example, 
within a password routine — when you will not want the 
user to break out by pressing [CTRL][C] or [CTRL][BREAKI]. 
He reminds us of the KEY command of Basic, which 
allows us to intercept many key sequences so that special 
actions can take place. Garry reasons that if he intercepts 
these special key sequences and does nothing with them, 
he could prevent their special use by MS-DOS. However, 
theory doesn’t seem to translate into reality: he sent in 
some simple code to intercept these two keystrokes — 
and also [CTRL][ALT][DEL] — but it will not function as he 
expected — why? He has coded: 


KEY 15,CHR$(&h04)+CHR&(&h2E) ‘ [CTRL] [C] 

KEY 16,CHR$(&h04)+CHR$(&h46) ‘ [CTRL] [BREAK] 
KEY 17,CHR$(&h0C)+CHR$(&h53) ‘ [CTRL] [ALT] [DEL] 
KEY(15) ON 

KEY(16) ON 

KEY(17) ON 


All very proper, it would appear; but this will not work 
on an AT. First of all, note that [CTRLI[C] would not cause 
any break or interruption unless you handled it specially 
anyway — so you don’t need KEY 15. When I consult my 
Programmer's PC Sourcebook (by Thom Hogan — from 
Microsoft Press) I find that scancode 46, when shifted 
with [CTRL], does indeed mean BREAK — but only on the 
original PC keyboard. With the AT keyboards BREAK is 
generated a completely different way; Garry’s KEY 16 
fails to intercept it on an AT — and I found no way to 
intercept it in Basic. 

On paper it looks like KEY 17 as coded by Garry 


May 92 PC PLUS 


BACKGROUND PROGRAMMING 


should intercept [CTRLI[ALTI[DEL] — but on my AT it 
doesn’t. On the AT extended keyboard you are normally 
put into NUMLOCK shift: this means that when you press 
[CTRLI[ALTI[DEL] it generates not 0C/53 (defined as KEY 
17) but 2C/53 — and escapes interception. 

There are two ways around this. First you could turn 
off NUMLOCK in your program before proceeding; this 
doesn’t prevent the user putting it back on — just to 
bypass your interception code. The second way is to 
make up a definition (say, KEY 18) for the combination 
with NUMLOCK on. The problem with this is that there 
are too many combinations to check; CAPS LOCK could 
be set as well (&h40, where NUMLOCK is &h20); 
SCROLL-LOCK (&h10) is seldom used by most keytap- 
pers, but could be set. 

Since each of these special shifts will affect the scan- 
code information needed for this KEY interception 
technique, you would need eight different KEY 
definitions — but Basic only permits six (15 to 20). 

You may like to experiment for yourself: the following 
routine can be interrupted with [CTRL][ALTI[DEL], but it 
throws you out to the DOS prompt rather than rebooting. 
It recognises the deadly sequence both when NUMLOCK 
is on and when it is off: 


100 KEY 15,CHR$(&HC)+CHR$(&H53) ‘CTRL/ALT + DEL 
110 KEY 16,CHR$(&H2C)+CHR$(&H53) ‘NUMLOCK/CTRL/ALT + DEL 


120 ON KEY(15) GOSUB 200 
130 ON KEY(16) GOSUB 200 


140 KEY(15) 
150 KEY(16) 


160 FOR I = 1 TO 3000 
170 PRINT I,1I*I 

180 NEXT 

190 SYSTEM 

200 PRINT “Don’t Panic!” 
210 SYSTEM 


SOMEWHERE OVER THE RAINBOW 


On this month’s SuperDisk you 
should find two little programs 
that may be of use to you: one 
(COLOURS.COM) displays the cur- 
rent 16 active colours (in text 

© mode), including all combina- 


; SiperDisk » tions. The other program is an 


\ 


: ASCII chart, including extensions 
beyond 127; this gives an instant 
view for reference, but also helps 
to identify the current font. I have 
recently found it pleasing to use a 


A program from the PC 
PLUS SuperDisk file: 
\magazine\colours.com 


bespoke font, with the numeral seven crossed (European 
style) and several other changes. 

One failing — or is it a strength? — that I have is the 
uneasiness I find when I am told that something just ‘is’: 
a fact is not an explanation, and I have always wanted to 
step beyond facts to explanations. I remember disputing 
with several physics teachers in my secondary school 
years. It just didn’t make any sense that red, yellow and 
blue were the three primary colours when you were 
dealing with pigments (like paint), but red, green and 
blue were the primary colours when you were dealing 
with light itself. 

I eventually worked out an explanation for myself 
which ignored conventional wisdom, but seemed to fit 
the bill: the ‘pigment’ primaries are not red, yellow and 
blue but (in PC colour terms) magenta, yellow and cyan. 
When you added magenta and yellow, you get a bright 
red (not orange). This is the colour common to both, so 
it becomes dominant. Similarly yellow and cyan pigments 
combine to form green — the ‘light’ primary that is hidden 
within both these colours. 

When you think about it in this respect, you can see 
the logic behind the colours on PC screens: all the 
colours are made up from the three primaries, red, green 
and blue. Think of the colour attribute byte being made 
up of bits controlling the presence of these three pri- 
maries. In text mode, the attribute byte is: 


BIT 0 (&h01) — BLUE foreground 

BIT 1 (&h02) — GREEN foreground 
BIT 2 (&h04) — RED foreground 

BIT 3 (&h08) — Foreground brightness 
BIT 4 (&h10) — BLUE background 

BIT 5 (&h20) — GREEN background 
BIT 6 (&h40) — RED background 


BIT 7 (&h80) — blinking in the foreground or brightness in 
the background 


Each character position in the 80 by 25 screen has an 
accompanying attribute byte, defining the colour of its 
foreground (the character itself), its background, the fore- 
ground intensity, and whether it blinks. 

How do you get CYAN? Well, you turn on the bits gov- 
erning the primary colours that go to make up cyan: that 
is, blue and green. To set the background of one text 
character to cyan, you would set the blue bit (&h01) and 
the green bit (&h02) both on. The little program 
COLOURS.EXE illustrates this colour addition in a dia- 
gram. You may remember that for some reason, different 
numbers are used when you use ANSI.SYS to set screen 
colours: one is red, two is green, three is yellow and so 


| Sam Hiley (London) writes to me, ‘I see that the enemy still hasn't 
got round to upgrading your mugshot to a 256-colour VGA ver- 
sion’. Frankly | find this frightening - and Sam should know, 
_ because he has met me face-to-face. | don’t think the world is 
| ready for a widely-published 16-colour shot of me, let alone a full 
| 256-colour image. 
| A photographer recently managed to get some new snaps off 
| before the lens cracked, so a revised photo may appear on this col- 
umn sooner or later. But don’t expect improvement, because | 
have had no radical plastic surgery since the earlier photo. 

Sam's concern was for better documentation of computer pack- 
| ages - in particular, languages that claim to be designed for 
_ hon-programmers to use. From the title of this workshop, | pre- 
_ sume most of us think of ourselves as programmers to some 
|| extent; yet like Sam, | find that production can drop to zero for an 
|| unacceptable length of time while | get to grips with new lan- 
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guages and techniques. 

Occasionally | pick up a product whose documentation just clicks 
into place, and | have a running start; my first productive programs 
follow quickly. Sometimes this may happen because of an inherent 
similarity between two disciplines; if you know and use Pascal, it 
shouldn’t be difficult to master Modula-2, for instance. Yet some- 
how hope springs eternal, and | nearly convince myself that 
somebody out there is doing it right, and that good documenta- 
tion is possible. 

Let's have some views and ideas on this: what would you want 
or expect from both reference and tuition documentation of a lan- 
guage - or perhaps of a language tool? If you were responsible for 
setting standards for documentation, what would you specify? _ 

Do you find it helpful (or annoying?) that so many manuals go 
back to the basics, describing how to insert a floppy disk in a drive, 
and how to change directories? Co 
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on. This looks like a completely different screen, but it is 
based on the same principle: the three primaries are 
assigned to a bit, and the other colours fit in by addition. 
In ANSI terminology: 


BIT 0 (&h01) is RED 
BIT 1 (&h02) is GREEN 
BIT 2 (&h04) is BLUE 


All others follow by addition: RED (01) plus BLUE (04) 
make MAGENTA (05), for instance. 

You may wish to build a little program that does the 
same thing with several POKE commands. Clear the 
screen, load DEBUG, and then key: 


EB800:0 [ENTER] 


This is equivalent to DEF SEG=&hB800 followed by 

PEEK (0); &hB800 is where the normal (page zero) colour 
screen starts. At this location you will find the hex ASCII 
code for the character at the top left of your screen. If — 
you continue by keying: 


10 [space] 01 [space] 10 [space] 02 [space] 10 [space] 
04 [enter] 


This will poke a right-pointing arrowhead into the first 
three positions of the screen (&h10) — but each will be a 
different colour, as determined by the 01, 02 and 04 that 
you keyed. Repeat with other values. 

Here’s a little program — key it in, and before you run 
it, see if you can predict its effect. 


100 DEF SEG = &HB800 

110 FOR I = 0 TO 24 

120 FOR J = 0 TO 78 STEP 2 
130 POKE I*160+3, &H10 

140 POKE I*160+J+1, &H4 
150 NEXT 

160 FOR J = 80 TO 158 STEP 2 
170 POKE I*160+J3, &H11 

180 POKE I*160+J3+1, &H12 
190 NEXT 

200 NEXT 


What we have been investigating up to now is text mode 
using the CGA (Colour Graphics Adaptor); you may have 
EGA (Enhanced Graphics Adaptor) or VGA (Video 
Graphics Array); each of these includes more features that 
affect even ordinary text mode. With EGA and VGA many 
more interrupt routines are available; colours can be 
modified, and the way individual characters look can be 


changed. When we consider EGA, the bits in the attribute 
byte no longer have the meanings they did in CGA — 
even though the method still uses red, green and blue 
elements (combined in various ways) to produce all the 
colours available. 

Each possible value of a half-byte is used as an index 
number into an array. EGA works by assigning a meaning 
to the values in that array, which it calls the palette. In 
CGA, ‘1’ means BLUE; in EGA, ‘1’ means COLOUR NUM- 
BER 1; this is fine, so long as the colour paint placed in 
pot number 1 is correct. 

As you may have thought, there is a simple way to 
change the colour in any of these 16 pots. For your 
experimentation, create the following little program: 
before running it, ran the COLOURS.COM program from 
the SuperDisk and terminate with [ESC], so that a chart of 
colours is still on the screen. 

When you run this tiny program, you should see an 
immediate change in one of the colours on your screen — 
that is, if you have EGA or VGA. Don’t worry — the 
change is not permanent: the old colour can be restored 
by keying MODE CO80 [ENTER]. When the system is 
rebooted it will also restore the old colours. 


A 

MOV AX,1000 
MOV BX, 0606 
INT 10 

INT 20 


If you are not sure how to turn this into a COM file 
(whose name, by the way, is COLCHG.COM), follow 
these steps: 

1. key the above code into a file named COLCHG.BUG 
2. key this command: DEBUG <COLCHG.BUG. 

This should produce the tiny program COLCHG.COM 
with which you can perform the experiment. Next month 
we will see how EGA decides on the colour it puts in. @ 


Tips, arguments and ideas are gratefully received by: 


Wilfs Programmers’ Workshop 
PC PLUS Magazine 

Beauford Court 

30 Monmouth Street 

BATH, BA1 2BW 
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